1 MD=14384:SP=13389:GP=13451:OC=15628:CK=15631:CR=15864:WW=15985:RP=16018
2 SO=16658:EZ=14162:ER=14366:SD=13628:MN=13647:MP=13977:MF=13736:MQ=14090
3 MT=14057:MU=14065:MV=14119:GQ=13526:RT=14020:PF=16266:PG=16267
4 S=1:A=0:JY=1:REM SET SOUND, ASCII CONVERT, & MOUSE DEFAULTS  1=ON - 0=OFF
5 DN=08:REM SET DEVICE NUMBER 08 TO 11
6 POKE254,JY:JZ=56321:BD=53280:BK=BD+1:S2=54272:S3=S2+1:S6=S2+4:S7=S2+5
7 S8=S2+6:FQ=54287:VC=54295:RS=65511:CL=59903
8 POKE253,DN:POKEBD,.:POKEBK,.:POKE788,52:DIMA$(112):PRINTCHR$(142):SYSER
9 A$="":PRINT"[144][147]":S1$="[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
10 PRINT A$"[213]"S1$"[192][192][192][192][201]"
11 PRINT A$"[221]    ULTRA SEQ-PRINT      [221]
12 [153] A$"(null)   ORIGINAL  PROGRAM     (null)
13 PRINT A$"[221] BY R.W. (BOB K7) KOBER  [221]
14 [153] A$"(null)   VERSION 7.0 UPDATE    (null)
15 PRINT A$"[221] BY JOE KOVALIK (JOEK22) [221]
16 [153]A$"MID$"S1$"TANTANTANTAN(null)"
17 [129]I[178]1[164]35:L$[178]L$[170]"TAB(":AS$[178]AS$[170]"*":[130]:S$[178]"                         "
18 RN$[178]"I   II  III IV  V   VI  VII VIIIIX  X   XI  XII XIIIXIV XV  "
19 [151]787,60:[151]2,7:[158]OC:[141]21:[158]CK:[151]787,30:[158]SD:[137]23
20 X[178]1:[142]
21 [129]K[178]1[164]3000:[130]:[142]
22 M[178][195](A$):[129]I[178]1[164]M[173]2:[153]"":[129]J[178]1[164]K:[153]"";:[130]:[153][166]20[171]I)[200](A$,I)[201](A$,I):[130]:[142]
23 [151]BD,0:[151]BK,0:[151]650,64:[158]CK
24 [151]53272,21:[153]"LOAD"[163]8)"STOP(null)"S1$"RIGHT$"
25 [153][163]8)"(null)      MAIN MENU      (null)":[153][163]8)"MID$"S1$"(null)"
26 [129]I[178]1[164]300:[130]:[151]2,5:[151]878,20:[158]OC
27 [151]252,0:[139]BOB[167][151]150,168:[158]GP:[137]46
28 [153][163]43)"USE      EMBEDDED <CR>     IGNORE"
29 [153][163]2)"DEF"L$
30 [153][163]3)"SYSSTEP  (null)WAITDEF"S$"FORSTEP  (null)LISTWAIT"
31 [153][163]3)"SYS F1 WAITDEF  SEND OUTPUT TO SCREEN  FOR F2 WAIT"
32 [153][163]3)"SYS(null)  WAITSTEPDEF"S$"FOR(null)  WAITSTEP"
33 [153][163]42)"CONT"L$
34 [153][163]3)"VERIFYSTEP  (null)WAIT"S$"CLRSTEP  (null)"
35 [153][163]3)"VERIFY F3 WAIT  CONT40 COLUMNS TO PRINTER  CLR F4 WAIT"
36 [153][163]3)"VERIFY(null)  WAITSTEP"S$"CLR(null)  WAITSTEP"
37 [153][163]42)"PRINT"L$
38 [153][163]3)"PRINT#STEP  (null)WAIT"S$"DEFSTEP  (null)"
39 [153][163]3)"PRINT# F5 WAIT PRINT 80 COLUMNS TO PRINTER  DEF F6 WAIT"
40 [153][163]3)"PRINT#(null)  WAITSTEP"S$"DEF(null)  WAITSTEP"
41 [153][163]42)"CLR"L$
42 [153][163]3)"CONTSTEP  (null)WAIT"S$"STEP  (null)"
43 [153][163]3)"CONT F7 WAITCLR DISK HOUSEKEEPING  FORQUIT  F8 WAIT"
44 [153][163]3)"CONT(null)  WAITSTEP"S$"(null)  WAITSTEP"
45 [139]BO[178]0[167]BOB[178]1:[151]150,168:[158]SP
46 [151]198,.:[160]15:[159]15,DN,15:[141]240:[146]JZ,16
47 MN$[178]"PRINT#       < F1=DIRECTORY : F5=MENU >ONON"
48 X[178]0:COL[178]0
49 [161]A$:[145][171](A$[178]"D")[137]273:[145][171](A$[179][177]"M")[137]50:JY[178]1[171]JY:[151]254,JY:[158]MN,81,120
50 [145][171](A$[178]"N")[137]322
51 [145][171](A$[178]"A")[141]118:[145][171](A$[178]"S")[141]239:[158]MP:[139]A$[179]"INPUT"[176]A$[177][199](140)[167]48
52 F$[178][201]([196]([198](A$)[171]132),1):[145][197](F$)[137]53,56,63,146,55,62,66,139
53 [158]MF:[139][194](252)[167]FF$[178]"$":[141]71:[145]X[137]24:[137]81
54 [141]87:[141]67:[145]X[137]24:[137]81
55 F$[178]"2":[137]53
56 F$[178]"3":[151]600,0
57 [158]MF:X[178]0:[141]88:[158]MN,122,155:[141]91:[139]COL[178]2[167]Z[178][171]1:[141]316
58 [139]X[178]1[167]24
59 [139][194](252)[167]FF$[178]"$":[141]71:[145]X[137]24:[137]61
60 [141]67:[139]X[178]1[167]24
61 [145]COL[137]80,208
62 F$[178]"4":[151]600,1:[137]57
63 F$[178]"5"
64 [139][194](252)[167]FF$[178]"$":[141]71:[145]X[137]24:[137]80
65 [158]MF:[141]89:[141]67:[145]X[137]24:[137]80
66 F$[178]"6":[137]64
67 [153]"":[151]214,I[171]2:[153]:[153]MN$
68 [151]207,0:[153]"SYS  ENTER SEQ FILENAME:";:[141]280:[139]FF$[178][199](135)[167]27
69 [139]FF$[179][177]"$"[175](F$[177]"2"[175]F$[179]"7")[167][141]253
70 [139]FF$[179][177]"$"[167][158]CK:X1[178]34:[142]
71 [141]313:[139]X[167][142]
72 X[178]0:[139]FF$[178]"$"[167][132]15,E,E$,T,I:[139]E[167][153]"LOAD":[141]135
73 [139]E[167]20
74 [158]CK:[153][199](142):[158]MD:[153]:[160]15:[159]15,DN,15
75 Y[178][194](598)[178]34:[139][168]Y[175](F$[177]"2"[175]F$[179]"7")[167][141]253
76 [158]CK:[139]Y[176](X[178]1)[167]20
77 X1[178]0:FF$[178]""
78 FF[178][194](580[170]X1):[139]FF[178]34[167][142]
79 FF$[178]FF$[170][199](FF):X1[178]X1[170]1:[137]78
80 [159]4,4,7:[141]127:[139]QQ[167]24
81 [151]252,0:[159]2,DN,2,FF$:[141]134:[145][171](E[179][177]0)[137]24:[141]101
82 [160]2:[160]4:[158]RS:[159]15,DN,15:X1[178]0:[141]98
83 [139][194](252)[178]2[167]24
84 [161]A$:[139]A$[178]"READ"[167]24
85 [151]214,23:[153]:[153]"        DEF (null)RESS F5 FOR THE (null)ENU WAIT        ON"
86 [158]MU:[161]A$:[145][171](A$[179][177][199](135))[137]86:[137]24
87 [129]I[178]6[164]8:[151]781,I:[158]CL:[130]:[142]
88 [129]I[178]11[164]13:[151]781,I:[158]CL:[130]:[142]
89 [129]I[178]16[164]18:[151]781,I:[158]CL:[130]:[142]
90 [129]I[178]21[164]23:[151]781,I:[158]CL:[130]:[151]214,21:[153]:[142]
91 [151]214,11:[153]:[153][163]6)"1WAIT OR CONT2WAIT COLUMNS?":[151]198,0:X[178]0
92 [139]([194](JZ)[175]1)[178]0[175][194](197)[178]64[167][158]MF:[137]20
93 [161]A$:[139]A$[178][199](160)[167][158]MQ:COL[178][194](780):[145][171](COL[178]0)[137]92:[137]97
94 [139]A$[178][199](135)[167][158]MF:[137]20
95 [139]A$[179]"1"[176]A$[177]"2"[167]92
96 COL[178][197](A$)
97 [158]MF:[142]
98 [145][171](S[178]0)[137]245:[129]L[178]S2[164]VC:[151]L,0:[130]:[151]VC[170]1,15:[151]S7,8:[151]S8,255
99 [151]S6,23:[129]Y[178]1[164]3:F2[178]8:[151]S3,2:[129]X[178]1[164]5:[151]FQ,F2:F2[178]F2[172]1.4:[130]:[130]:[129]W[178]1[164]8
100 [151]FQ,F2:F2[178]F2[172]1.07:[130]:[151]S8,15:[142]
101 RP$[178]"(null)(null)RIGHT$(null)(null)VAL(null)":[139]F$[178]"1"[176]F$[178]"2"[167]RP$[178]"(null)VALATNSTR$VAL(null) "
102 [158]CK:[153]"LOAD"[199](14):[153][163]2)"STOP"AS$
103 [153][163]2)"*    ASC"F$" (null)(null)(null)(null)ATNCLOSE(null)VAL(null)-ASCRIGHT$(null)VALCLOSE"RP$"    *"
104 [153][163]2)""AS$:[151]214,23:[153]
105 M1$[178]"LEFT$OLD SHIFT TO PAUSE - ":M2$[178]"(null)RESS F5 TO ABORTONON"
106 [139]F$[178]"1"[176]F$[178]"2"[167]M1$[178]"LEFT$OLD SHIFT TO SCROLL -":M2$[178]" LEFT$IT F5 TO ABORT ONON"
107 [153]M1$M2$:[129]I[178]1[164]300:[130]:[151]2,12:[151]787,20
108 [158]OC:[151]214,23:[153]:[153]"DEF"M1$"SYS"M2$""
109 [145][197](F$)[137]110,111,112,113,114,115
110 [158]RP,40,0,0,0,0:X1[178]0:[142]
111 [158]RP,39,1,0,0,0:X1[178]0:[142]
112 [141]116:[158]RP,40,0,1,M,0:X1[178]0:[142]
113 [141]116:[158]RP,39,1,1,M,0:X1[178]0:[142]
114 [141]116:[158]RP,80[171]R[171]M,0,1,M,F:XI[178]0:[142]
115 [141]116:[158]RP,79[171]R[171]M,1,1,M,0:XI[178]0:[142]
116 [139]F[167][142]
117 [129]I[178]1[164]5:[152]4:[130]:[142]
118 A[178]1[171]A:[151]820,A:[137]243
119 [145][171](S[178]0)[137]21:[129]L[178]S2[164]VC:[151]L,0:[130]:[151]VC[170]1,9:[151]S7,8:[151]S8,252
120 [151]S6,21:[151]FQ,40:[129]Z[178]1[164]T:[129]F1[178]255[164]0[169][171]6:[151]S3,F1:[130]F1:[129]F1[178]0[164]255[169]50
121 [151]S3,F1:[130]F1:[130]Z:[151]VC[170]1,15:[151]S6,20:[129]Z[178]1[164]2500:[130]
122 [151]S7,128:[151]S8,250:[142]
123 [145][171](S[178]0)[137]21:[129]L[178]S2[164]VC:[151]L,0:[130]:[151]VC[170]1,15:[151]S7,8:[151]S8,255
124 [151]S6,23:[129]Z[178]1[164]1:F1[178]10:[129]Y[178]1[164]6:F2[178]30:[151]S3,F1:[129]X[178]1[164]3:[151]FQ,F2
125 F2[178]F2[173]1.2:[130]X:F1[178]F1[172]1.5:[130]Y:[129]W[178]1[164]30:[151]S3,F1:[151]FQ,5:[129]V[178]1[164]5:[130]V
126 F1[178]F1[173]1.5:[130]W:[130]Z:[151]S8,15:[142]
127 [160]4:[139]ST[178]0[167][159]4,4,7:QQ[178]0:[142]
128 [153]"DEF      THE PRINTER IS NOT ON LINE"
129 [153]"     TURN IT ON AND PRESS ANY KEY"
130 [153]"        OPENPRESS F5 FOR THE MENU":[141]123:[151]198,0
131 [158]MU:[161]A$:[139]A$[178]""[167]131
132 [139]A$[178]"READ"[167]QQ[178]1:[142]
133 [159]4,4,7:[137]127
134 [132]15,E,E$:[139]E[178]0[167][142]
135 [153]"LOAD         DISK ERROR ENCOUNTERED":[153][163]20[171][195](E$)[173]2)E$
136 [141]123:[153]"OPEN          ANY KEY TO CONTINUE":[151]198,0
137 [161]A$:[158]MU:[139]A$[178]""[167]137
138 [160]2:[160]4:[142]
139 [158]MF
140 K[178]21:A$[178]" SYS     ARE YOU SURE?     ":[141]22:[151]198,0
141 [158]MT:[161]A$:[139]A$[178]""[167]141
142 [145][171](A$[178]"Y")[137]144
143 [153]"ONONON":[137]27
144 [151]214,21:[153]:[153][163]8)"DEF USE ULTRA AGAIN, SOON ":[151]198,0
145 [151]650,0:T[178]3:[141]119:[158]65126
146 [151]150,168:[158]GP:[151]2040,11:X[178]0:[141]241:[160]15:[159]15,DN,15
147 FF[178]0:[153]"LIST":[151]214,8:[153]:[153][163]6)"(null)TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANRIGHT$"
148 [153][163]6)"(null)"S$"(null)":[153][163]6)"(null) DISK HOUSE KEEPING MENU (null)"
149 [153][163]6)"(null) USRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSRUSR (null)":[153][163]6)"(null) 1. SELECT DRIVE         (null)"
150 [153][163]6)"(null) 2. SCRATCH A FILE       (null)":[153][163]6)"(null) 3. RE-NAME A FILE       (null)"
151 [153][163]6)"(null) 4. FORMAT (NEW) A DISK  (null)":[153][163]6)"(null) 5. VIEW DIRECTORY       (null)"
152 [153][163]6)"(null) 6. RETURN TO MAIN MENU  (null)":[153][163]6)"(null)"S$"(null)"
153 [153][163]6)"MID$"S1$"TANTANTANTAN(null)":ID[178]0
154 [158]GQ:[146]JZ,1:[151]198,0:[158]MN,103,157
155 [139]([194](JZ)[175]1)[178]0[175][194](197)[178]64[167][158]MF:[137]27
156 [161]A$:[139]A$[178][199](160)[167][158]MV:K[178][194](780):[145][171](K[178]0)[137]155:[137]160
157 [139]A$[178][199](135)[167]A$[178]"6"
158 [139]A$[178]"D"[167]A$[178]"1"
159 K[178][197](A$):[139]K[179]1[176]K[177]6[167]155
160 [145]K[137]272,162,183,195,248,27
161 [151]512,32:[142]
162 [153]"LOADFOR":[151]BD,0:[151]BK,0:[158]MF:S2$[178]"               ":CO[178]2
163 [153][163]40)""S$S2$;
164 [153]"    THIS ROUTINE WILL SCRATCH A FILE    ";
165 [153]""S$S2$
166 [139]FF[178]34[167]171
167 [151]214,11:[153]:[153]MN$"ON"
168 [151]207,0:[153]"SYS  ENTER SEQ FILENAME: DEF";:[141]280
169 [139]FF$[178][199](135)[167]146
170 [139]FF$[178]"$"[167][141]71:[137]162
171 [141]88:B$[178]"LISTSCRATCH SEQ FILE DEF"[170][199](34)[170]FF$[170][199](34):FF[178]0
172 [153]:[153]""[163]21[171][195](B$)[173]2)B$
173 [153][163]90)"SYSARE YOU SURE?? (Y/N)":[151]198,0
174 [161]K$:[158]MU:[139]K$[178]""[167]174
175 [139]K$[178][199](135)[167]146
176 [139]K$[179][177]"Y"[175]K$[179][177][199](13)[175]K$[179][177][199](160)[167]FF$[178]"":[137]162
177 B$[178]" SCRATCHING  "[170]FF$[170]" ":[153][163]20[171][195](B$)[173]2)B$:[152]15,"S0:"FF$
178 [132]15,ER,ER$,T,SA:[139]K[178]3[176]K[178]4[167][142]
179 G9$[178][200](ER$,4)[170][201](ER$,10):E9$[178]" "[170]FF$[170]" WAIT "[170]G9$
180 [139]T[178].[167][153][163]48)"**** FILE NOT FOUND ****":[141]123
181 [139]T[178].[167][129]I[178]1[164]1500:[130]:[137]162
182 [153][163]60[171][195](E9$)[173]2)E9$:[141]98:[129]I[178]1[164]1000:[130]:[137]146
183 [129]I[178]21[164]24:[151]781,I:[158]CL:[130]:CO[178]2:[158]MF
184 [153]"":[151]214,22:[153]:[153]MN$:[151]207,0:[153][163]9)"SYSOLD NAME = DEF";
185 [139]FF[178]34[167]FF[178]0:[153]"DEF"FF$;:PN$[178]FF$:[151]783,.:[137]188
186 [141]280:PN$[178]FF$:[139]FF$[178][199](135)[167]154
187 [139]PN$[178]"$"[167][151]150,96:[158]SP:[141]71:[151]150,96:[158]GP:[137]184
188 [151]781,23:[158]CL
189 [151]214,22:[153]:[151]207,0:[153][163]9)"SYSNEW NAME =  CMD";:[141]280:NN$[178]FF$
190 [139]FF$[178][199](135)[167]154
191 [141]90
192 CN$[178]""[170]PN$[170]"SYS  IS  "[170]NN$
193 [153]"SYS"[163]22[171][195](CN$)[173]2)CN$"ONON":[152]15,"R0:"[170]NN$[170]"="[170]PN$:[141]134:[139]E[167]146
194 [141]21:[141]98:[137]146
195 [141]312:[139]X[167]146
196 [158]MF:[151]214,20:[153]:[153][163]2)"          ---WARNING!!!---          "
197 [153]"DEF  ALL DATA ON THE DISK TO BE FORMATTED"
198 [153]"  WILL BE DESTROYED - OK TO CONTINUE?":[146]JZ,16:[151]198,0:X[178]0
199 [139]([194](JZ)[175]1)[178]0[167]154
200 [161]A$:[139]A$[178]""[167]199
201 [139]A$[179][177]"Y"[175]A$[179][177][199](160)[167]154
202 [141]90:[151]207,0:[153][163]12)"CONTENTER ID: SYSRKCMDCMD";:ID[178]1
203 [141]294:[139]X[178]1[167]154
204 [141]90:[153]"CONT   OKAY - FORMATTING TAKES 90 SECONDS"
205 [152]15,"N:ULTRA SEQ-FILES,"B$
206 [141]178:[139]ER[179][177]0[167][141]135:[137]146
207 [137]154
208 [160]4:[159]4,4,7:[141]127:[139]QQ[167]24
209 L[178]0:[153]"LOADPOKE":[151]BD,11:[151]BK,11:[151]53272,23
210 [153]""[163]3)"                                  "
211 [153][163]3)" << (null)EADING ASCILE RIGHT$NTO AN ATNRRAY >> "
212 [153][163]3)"                                  ":[151]787,25:[151]2,15:[158]OC
213 [139]L[167][153]""[163]43)"LIST << (null)EADING ASCILE RIGHT$NTO AN ATNRRAY >> "
214 MS$[178]"  DEFLEFT$(null)(null)STR$ (null)LEFT$RIGHT$ASC(null)PRINT TO (null)AUSE ---- SYSASC5PRINT TO ATNBORTONONONOPEN"
215 [151]214,23:[153]:[153]MS$
216 [139]L[167]L[178]0:[137]219
217 [159]2,DN,2,FF$:[141]134:[139]E[167]23
218 YY[178]1:[151]CR[171]2,0:[158]CR
219 [129]K[178]1[164]112:A$(K)[178]"":[130]:U[178]0
220 [145][171]([194](CR[171]3)[179][177]0)[137]228:[139][194](CR[171]2)[177]80[167][151](CR[171]2),0:[141]161
221 [129]I[178]0[164][194](CR[171]2):AA$[178][199]([194](512[170]I)):A$(YY)[178]A$(YY)[170]AA$
222 [139][195](A$(YY))[177]40[167]YY[178]YY[170]1
223 [139][202](A$(YY),40,1)[178]" "[167]A$(YY)[178][200](A$(YY),[195](A$(YY))[171]1)
224 [130]:[158]SO:[151]214,19:[153]:[153]A$(YY):YY[178]YY[170]1:[145][171]([194](600)[178]0)[141]161:[158]WW
225 [141]308:[145]X[137]237
226 [139]U[167][153]MS$:U[178]0
227 [145][171](YY[178]112)[137]231:[153]:[137]220
228 [129]I[178]0[164][194](CR[171]2)[171]1:AA$[178][199]([194](512[170]I)):A$(YY)[178]A$(YY)[170]AA$:[130]
229 [158]SO:[151]214,19:[153]
230 [153]A$(YY):[160]2:[158]RS:[159]4,4,7
231 [153]""[163]44)"LIST      << STR$ATA TO (null)RINTER >>     ":[129]I[178]1[164]5:[152]4:[130]
232 [139]YY[173]2[179][177][181](YY[173]2)[167]YY[178]YY[170]1
233 I1[178]YY[173]2:[129]II[178]1[164]I1:[152]4,A$(II);[163]41[171][195](A$(II)));A$(II[170]I1)
234 [141]308:[145]X[137]237
235 [139]U[167][153]MS$:U[178]0
236 [130]:[141]328:[139]YY[177]111[167]YY[178]1::L[178]1:[137]213
237 T[178]1:[141]119:[160]2:[158]CK:[153]"LOAD":[151]BD,.:[151]BK,.:[158]RS:[159]15,DN,15:BOB[178]0:[137]24
238 [129]D[178]1[164]1200:[130]:[142]
239 S[178]1[171]S:[141]246
240 [139]JY[178]1[167][158]MN,81,120
241 [153]"SYSWAIT SOUND":[139]S[167][153]"  ON "
242 [139]S[178]0[167][153]"  OFF"
243 [153]""[163]73)"ASCII":[139]A[167][153]""[163]114)"ON "
244 [145][171](A[178]1)[137]245:[153]""[163]114)"OFF"
245 [142]
246 [145][171](S[178]0)[137]245:[129]I[178]S2[164]I[170]23:[151]I,.:[130]:SI[178]S2:[151]SI[170]1,106:[151]SI[170]5,12
247 [151]SI[170]6,15:[151]SI[170]24,15:[151]SI[170]15,30:[151]SI[170]4,21:[142]
248 [158]MF:[153]"LIST";
249 [141]313:[139]X[167]23
250 [158]EZ:[139]ST[179][177]64[175]ST[179][177]0[167]E$[178]"MISSING OR UNFORMATTED DISK":[141]135:[137]146
251 [151]214,23:[153]:[153][163]10)"SYS ANY KEY TO CONTINUE ";:[146]JZ,16:[151]198,0
252 [161]A$:[158]MU:[145][171](A$[178]"")[137]252:[141]313:[137]146
253 Z[178]((F$[178]"3")[175](FF$[179][177]"")[175](FF$[179][177]"$")):[139]COL[178]2[167][142]
254 [145]Z[170]2[141]88,89
255 [151]214,16[170]5[172]Z:[153]:X[178]0
256 MG$[178]"0 ":[139]F$[178]"3"[167]MG$[178]"20"
257 [151]207,0:[153]"    LEFT MARGIN:FOR  "MG$"CMDCMD";:[141]294
258 M[178][197](B$):[139]M[177]41[167]253
259 [139]F$[178]"3"[176]F$[178]"4"[176]X[178]1[167][142]
260 [151]214,17:[153]:[151]207,0:[153]"    RIGHT MARGIN:FOR 0 CMDCMD";:[141]294
261 R[178][197](B$):[139]R[177]41[167]253
262 [139]X[178]1[167][142]
263 [139]PN[167][137]316
264 [139]F$[178]"6"[167][142]
265 [141]89:[151]214,16:[153]:[153]"OPEN    PREFORMATTED TEXT?SYS N  CMDCMDCMD";
266 [139]([194](JZ)[175]1)[178]0[175][194](197)[178]64[167]20
267 [161]A$:[139]A$[178][199](160)[176]A$[178][199](13)[176]A$[178][199](133)[176]A$[178]"N"[167]270
268 [139]A$[178][199](135)[167]20
269 [139]A$[179][177]"Y"[167]266
270 F[178][171](A$[178]"Y"):[139]F[178]1[167][153]"Y"
271 [142]
272 [158]MF:I[178]2:[137]274
273 I[178]1
274 DN[178]DN[170]1[170]4[172](DN[178]11):[151]253,DN:[151]214,21:[153]
275 [153][163]8)"SYS    DEVICE NO.=        CMDCMDCMDCMDCMDCMDCMDCMD"DN:TM[178]0:[146]JZ,16
276 [158]RT:[139][194](781)[167]279
277 [161]A$:TM[178]TM[170]1:[145][171](TM[177]20)[137]279
278 [145][171]((A$[178]"D")[176](A$[178]"1"))[137]274:[145][171]((A$[179][177][199](13))[175](A$[179][177][199](135)))[137]276
279 [145]I[137]27,154
280 A$[178]"":FF$[178]"":[151]207,0:[151]204,0:[151]198,0
281 [139]([194](JZ)[175]1)[178]0[175][194](197)[178]64[167]A$[178][199](135):[137]288
282 [161]A$:[139]A$[178]""[167]281
283 [139]A$[178][199](133)[176]A$[178][199](160)[167]A$[178][199](13)
284 [139]A$[178][199](13)[175]FF$[178]""[167]FF$[178]"$":PG$[178]"1":[137]293
285 [139]A$[178][199](13)[167]292
286 [139]FF$[178]""[175]A$[178][199](20)[167]281
287 [139]A$[178][199](20)[167][153]" CMDCMD CMD";:FF$[178][200](FF$,[195](FF$)[171]1):[137]281
288 [139]A$[178][199](135)[167]FF$[178]A$:[137]293
289 [139]A$[179]" "[176](A$[177][199](127)[175]A$[179][199](160))[167]281
290 [139][195](FF$)[178]16[167]281
291 FF$[178]FF$[170]A$:[151]207,0:[153]A$" CMD";:[137]281
292 PG$[178]FF$
293 [153]" ";:[151]204,1:[142]
294 A$[178]"":B$[178]"":[151]204,0:[151]198,0
295 [139]([194](JZ)[175]1)[178]0[175][194](197)[178]64[167]X[178]1:[137]307
296 [161]A$:[139]A$[178][199](160)[176]A$[178][199](133)[167]A$[178][199](13)
297 [139]A$[178][199](135)[167]X[178]1:[137]307
298 [139]A$[178][199](13)[175]B$[178]""[175]ID[178]0[167]B$[178]MG$:[153]B$;:[137]307
299 [139]A$[178][199](13)[175]B$[178]""[167]B$[178]"RK":[153]B$:[137]307
300 [139]A$[178][199](13)[167]307
301 [139]B$[178]""[175]A$[178][199](20)[167]295
302 [139]A$[178][199](20)[167][153]" CMDCMD CMD";:B$[178][200](B$,[195](B$)[171]1):[137]295
303 [139]ID[167][145][171]((A$[179]"0")[176](A$[177]"Z"))[137]295:[137]305
304 [139]A$[179]"0"[176]A$[177]"9"[167]295
305 [139][195](B$)[178]2[167]295
306 B$[178]B$[170]A$:[151]207,0:[153]A$" CMD";:[137]295
307 [153]"  ":[151]204,1:[142]
308 A$[178]"  DEF(null)VAL(null)VALATN(null)VALPRINT TO LENONTINUE ---- SYSASC6ON":X[178]0
309 [139][194](197)[178]6[176][194](197)[178]63[176]([194](JZ)[175]1)[178]0[167]20
310 [139][194](653)[178]1[176][194](197)[178]0[167][151]214,23:[153]:[153]A$:U[178]1:[137]309
311 [142]
312 [160]15:[159]15,DN,15,"U;":[137]314
313 [160]15:[159]15,DN,15,"I"
314 X[178]0:[158]MF:[139]ST[178][171]128[167]E$[178]"DEVICE NOT PRESENT":[141]135:[137]20
315 [142]
316 [139]PN[178]0[167][142]
317 F[178]0:[145]Z[170]2[141]88,89:[151]214,16[170]5[172]Z:[153]
318 [153]"OPEN    STARTING PAGE NO:SYS 1 CMDCMD";:[141]280:PS[178][197](PG$)[171](PG$[178]"I")
319 [151]PF,1[171](PG$[178]"I")
320 [139]FF$[178][199](135)[167]X[178]1
321 [151]PG,PS:[142]
322 B$[178]"FFN ":[151]214,21:[153]
323 PN[178]1[171]PN:[153][163]8)"SYS   PAGE NUMBERING O"[202](B$,1[170]PN[172]2,2)"  ONON"
324 [129]K[178]1[164]120
325 [161]A$:[139]A$[178]"N"[167]322
326 [139]A$[178]""[167][130]
327 [151]PF,PN:[137]27
328 [152]4:[152]4
329 [139]PN[178]0[167][152]4:[137]334
330 [139]YY[179]111[167][129]I[178]1[164][181]((112[171]YY)[173]2[170].5):[152]4:[130]
331 [129]I[178]0[164]38:[152]4," ";:[130]
332 [139]PG$[178]"I"[167][152]4,[202](RN$,PS,4):PS[178]PS[170]4:[137]334
333 [152]4,PS:PS[178]PS[170]1
334 [152]4:[152]4:[142]